szBuffer=512
buffer: rb szBuffer
intro: ub 'what is your age ?..',0
memcopy buffer intro ($-intro)
InputBoxA buffer szBuffer
age==GetFloat buffer



MinTeenAge==13
MaxTeenAge==19
if age isin 0 (MinTeenAge-1)
  pause 'Hello boy/girl!'
elsif age isin MinTeenAge MaxTeenAge
  pause 'Hello teen!'
else
  pause 'Hello mr/s!'
endif
